home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 - Inside Community Club / Acrobat Pro 6 D.bin / installer / Data1.cab / _52C27E354C4E48A5B8CE05B143AB9866 < prev    next >
Encoding:
Text File  |  2003-10-30  |  43.8 KB  |  619 lines
  1. %!PS-Adobe-3.0 Resource-ProcSet
  2. %%BeginResource: ProcSet CIDInitC
  3. %%Title: (ProcSet/CIDInitC)
  4. %%Version: 3010.01
  5. %%Copyright: ------------------------------------------------------------
  6. %%Copyright: Copyright 1990-1999 Adobe Systems Incorporated.
  7. %%Copyright: All rights reserved.
  8. %%Copyright:
  9. %%Copyright: Patents Pending
  10. %%Copyright:
  11. %%Copyright: NOTICE: All information contained herein is the property
  12. %%Copyright: of Adobe Systems Incorporated. Many of the intellectual
  13. %%Copyright: and technical concepts contained herein are proprietary
  14. %%Copyright: to Adobe, are protected as trade secrets, and are made
  15. %%Copyright: available only to Adobe licensees for their internal use.
  16. %%Copyright: Any reproduction or dissemination of this software is
  17. %%Copyright: strictly forbidden unless prior written permission is
  18. %%Copyright: obtained from Adobe.
  19. %%Copyright:
  20. %%Copyright: PostScript and Display PostScript are trademarks of
  21. %%Copyright: Adobe Systems Incorporated which may be registered in
  22. %%Copyright: certain jurisdictions.
  23. %%Copyright: ------------------------------------------------------------
  24. %%EndComments
  25. cid_extensions begin/CIDInitC 73 dict begin/cid_version 3010.01 def
  26. /cid_revision 0 def/cid_versionName(CSL Compatible 3010.01)def/cid_resizeArray
  27. {dup null eq{pop array}{dup length 3 -1 roll add array dup 0 4 -1 roll
  28. putinterval}ifelse}bind def/cid_redefString{1 index load length 1 index lt{1.2
  29. mul cvi 1 add string def}{pop pop}ifelse}bind def/cid_strcat{dup type/nametype
  30. eq{sstr1 cvs}if exch dup type/nametype eq{sstr2 cvs}if 2 copy length exch
  31. length 1 index add string dup 0 5 -1 roll putinterval dup 4 2 roll exch
  32. putinterval}bind def/cid_cvnsi{1 index add 1 sub 1 exch 0 4 1 roll{2 index
  33. exch get exch 8 bitshift add}for exch pop}bind def/cid_raise{exch cvx exch
  34. errordict exch get exec stop}bind def/cid_reraise{cvx $error/errorname get
  35. errordict exch get exec stop}bind def/cid_InitErrorDict{userdict/cid_errordict
  36. known not{userdict/cid_errordict 4 dict begin/cid_opStkCount 32 dict def
  37. /cid_opStkDepth 0 def/cid_dictStkCount 32 dict def/cid_dictStkDepth 0 def
  38. currentdict end put}if}bind def/cid_OpStkPushCount{cid_errordict begin
  39. cid_opStkCount exch cid_opStkDepth exch put/cid_opStkDepth cid_opStkDepth 1
  40. add def end}bind def/cid_OpStkPopCount{cid_errordict begin/cid_opStkDepth
  41. cid_opStkDepth 1 sub def cid_opStkCount cid_opStkDepth get end}bind def
  42. /cid_DictStkPushCount{cid_errordict begin cid_dictStkCount exch
  43. cid_dictStkDepth exch put/cid_dictStkDepth cid_dictStkDepth 1 add def end}bind
  44. def/cid_DictStkPopCount{cid_errordict begin/cid_dictStkDepth cid_dictStkDepth
  45. 1 sub def cid_dictStkCount cid_dictStkDepth get end}bind def/cid_stopped{
  46. cid_InitErrorDict count 2 sub cid_OpStkPushCount countdictstack
  47. cid_DictStkPushCount stopped{count cid_OpStkPopCount sub dup 0 gt{{pop}repeat}
  48. {pop}ifelse countdictstack cid_DictStkPopCount sub dup 0 gt{{end}repeat}{pop}
  49. ifelse//true}{cid_OpStkPopCount pop cid_DictStkPopCount pop//false}ifelse}bind
  50. def/cid_CheckForCompatibleFont{dup/CompatibleFont resourcestatus dup{pop pop
  51. pop lib_extensions begin false lib_vmSaveState end/CompatibleFonts/ProcSet
  52. findresource begin currentenable exch/CompatibleFont currentexception not and
  53. end lib_extensions begin lib_vmRestoreState end}{exch pop}ifelse}bind def
  54. /cid_CallCheckForCompatibleFont{/CIDInitC/ProcSet findresource
  55. /cid_CheckForCompatibleFont get exec}bind def/cid_beginrange{exch dup type
  56. /integertype ne{/cid_beginrange/typecheck cid_raise}if dup dup 100 gt exch 0
  57. le or{/cid_beginrange/rangecheck cid_raise}if dup/cid_N exch def mul/cid_E
  58. exch def mark}bind def/cid_endrange{counttomark 2 sub cid_E ne{/cid_endrange
  59. /rangecheck cid_raise}if/cid_m1 exch def/cid_m2 exch def/cid_I 0 def
  60. /cid_TUPLES cid_N def cid_E{cid_TUPLES 0 le{exit}if dup index cid_m1 1 sub{
  61. exch dup index}repeat exch cid_m1 sub cid_m1 1 add 1 roll cid_m2 exec/cid_I
  62. cid_I 1 add def/cid_TUPLES cid_TUPLES 1 sub def}loop cleartomark}bind def
  63. /cid_Codespace{/cid_la exch def/cid_l9 exch def cid_l9 length dup dup cid_la
  64. length ne exch 2 gt or{/cid_Codespace/rangecheck cid_raise}if dup{cid_l5 -1 eq
  65. {/cid_l5 exch def exit}if cid_l5 ne{/cid_l5 0 def}if exit}loop/cid_l6 cid_l7 1
  66. add cid_l9 0 get eq{1}{2}ifelse cid_l6 add def/cid_l7 cid_la 0 get def{dup 1
  67. eq{pop[cid_l9 0 get dup cid_la 0 get exch sub 2 add 3 mul string null cid_lc
  68. dup null ne{dup 1 add/cid_lc exch def}if null]exit}if dup 2 eq{pop[cid_l9 0
  69. get[cid_l9 1 get cid_la 0 get 3 index sub 1 add dup array cid_la 1 get 3 index
  70. sub 2 add 3 mul 2 index{dup string 3 1 roll}repeat pop astore exch cid_l9 1
  71. get cid_la 1 get cid_makeCharStringsDict exch dup[exch{cid_lc dup null ne{dup
  72. 1 add/cid_lc exch def}if}repeat]readonly exch[exch{null}repeat]]]exit}if
  73. /cid_Codespace/rangecheck cid_raise}loop cid_l3 cid_I 3 2 roll put/cid_lb 0
  74. def}bind def/cid_notdef{/cid_s1 exch def/cid_la exch def/cid_l9 exch def
  75. cid_l4 dup length cid_N sub cid_I add[cid_l9 cid_la cid_s1]put}bind def
  76. /cid_range{/cid_m3 exch def/cid_la exch def/cid_l9 exch def cid_lc type
  77. /dicttype eq{cid_lc/UIDOffset known{UIDOffset}{null}ifelse/cid_lc exch def}if
  78. cid_l9 dup type/stringtype ne cid_la type/stringtype ne cid_m3 type
  79. /integertype ne or or{/cid_range/typecheck cid_raise}if length dup cid_la
  80. length ne cid_m3 0 lt or{/cid_range/rangecheck cid_raise}if/cid_m4//true def{
  81. dup 1 eq{pop/cid_l9 cid_l9 0 get def/cid_la cid_la 0 get def/cid_sa 0 def
  82. cid_l3{dup 1 get type/stringtype eq{dup 0 get dup/cid_s6 exch def cid_l9 gt{
  83. pop exit}if dup 1 get length 3 idiv 2 sub cid_s6 add dup/cid_s5 exch def
  84. cid_la ge{dup wcheck not{dup length array copy dup dup 1 get dup length string
  85. copy 1 exch put dup 3 cid_lc dup null ne{dup 1 add/cid_lc exch def}if put
  86. cid_l3 cid_sa 2 index put}if 1 get/cid_s9 exch def 3 dup dup cid_l9 cid_s6 sub
  87. 1 add mul 3 1 roll cid_la cid_s6 sub 1 add mul{cid_s9 1 index cid_l8 put 1 add
  88. cid_s9 1 index cid_m3 -8 bitshift put 1 add cid_s9 exch cid_m3 255 and put
  89. /cid_m3 cid_m3 1 add def}for/cid_m4//false def exit}{pop}ifelse}{pop}ifelse
  90. /cid_sa cid_sa 1 add def}forall exit}if dup 2 eq{pop/cid_s1 cid_l9 dup 0 get
  91. /cid_s2 exch def 1 get def/cid_s3 cid_la dup 0 get/cid_s4 exch def 1 get def
  92. /cid_sa 0 def cid_l3{dup 1 get type/arraytype eq{dup 0 get dup/cid_s7 exch def
  93. cid_s2 gt{pop exit}if dup 1 get dup 0 get dup/cid_s8 exch def cid_s1 le exch
  94. dup 0 get exch 1 get dup length exch 0 get length 3 idiv exch cid_s7 add
  95. cid_s4 gt 3 1 roll add 1 sub cid_s3 gt and and{dup wcheck not{dup length array
  96. copy dup dup 1 get dup length array copy dup dup 1 get dup length array copy 1
  97. exch put dup dup 3 get dup length array copy 3 exch put 1 exch put cid_l3
  98. cid_sa 2 index put}if 1 get dup 1 get dup cid_s2 cid_s7 sub 1 cid_s4 cid_s7
  99. sub{2 copy get dup wcheck not{dup length string copy 3 copy put 4 index 3 get
  100. 2 index cid_lc dup null ne{dup 1 add/cid_lc exch def}if put}if 3 -1 roll pop
  101. /cid_s9 exch def pop exch pop 3 dup dup cid_s1 cid_s8 sub 1 add mul 3 1 roll
  102. cid_s3 cid_s8 sub 1 add mul{cid_s9 1 index cid_l8 put 1 add cid_s9 1 index
  103. cid_m3 -8 bitshift put 1 add cid_s9 exch cid_m3 255 and put/cid_m3 cid_m3 1
  104. add def}for dup}for pop pop/cid_m4//false def exit}{pop}ifelse}{pop}ifelse
  105. /cid_sa cid_sa 1 add def}forall exit}if(YIKES, UNSUPPORTED length =)print dup
  106. == pop exit}loop cid_m4{/cid_range/rangecheck cid_raise}if}bind def
  107. /cid_makeCharStringsDict{2 copy exch sub 2 add dict begin/.notdef 0 def
  108. cid_sstr2 1(00)putinterval 1 3 1 roll 1 exch{cid_sstr2 dup 3 2 roll 16
  109. cid_sstr1 cvrs dup length 3 exch sub exch putinterval cvn 1 index def 1 add}
  110. for pop currentdict end readonly}bind def/cid_bfrange{/cid_dstID exch def
  111. /cid_la exch def/cid_l9 exch def cid_l9 dup type/stringtype ne cid_la type
  112. /stringtype ne cid_dstID dup type/stringtype ne exch type/arraytype ne and or
  113. or{/cid_bfrange/typecheck cid_raise}if length dup cid_la length ne{
  114. /cid_bfrange/rangecheck cid_raise}if/cid_m4//true def{dup 1 eq{pop/cid_l9
  115. cid_l9 0 get def/cid_la cid_la 0 get def/cid_sa 0 def cid_l3{dup 1 get type
  116. /stringtype eq{dup 0 get dup/cid_s6 exch def cid_l9 gt{pop exit}if dup 1 get
  117. length 3 idiv 2 sub dup/cid_GLYPH_COUNT exch def cid_s6 add dup/cid_s5 exch
  118. def cid_la ge{dup wcheck not{dup length array copy dup dup 4 get dup null eq{
  119. pop cid_GLYPH_COUNT dict}{dup wcheck not{dup length dict copy}if}ifelse 4 exch
  120. put cid_l3 cid_sa 2 index put}if cid_dstID type/arraytype eq{cid_dstID length
  121. cid_la cid_l9 sub 1 add lt{/cid_bfrange/rangecheck cid_raise}if}if dup 4 get
  122. dup null eq{pop cid_GLYPH_COUNT dict}if dup begin cid_l9 cid_la cid_dstID
  123. cid_UpdateCharCodeMap end 4 exch put/cid_m4//false def exit}{pop cid_l9 cid_s6
  124. ge cid_l9 cid_s5 le and cid_la cid_s5 gt and{cid_m1 add 1 string dup 0 cid_l9
  125. put 1 string dup 0 cid_s5 put cid_dstID dup length string copy 3 index cid_m1
  126. add 1 add cid_m1 roll dup index 0 cid_s5 1 add put dup 2 sub index 0 cid_s5 1
  127. add put cid_m1 add/cid_TUPLES cid_TUPLES 2 add def/cid_m4//false def/cid_I
  128. cid_I 1 sub def exit}if}ifelse}{pop}ifelse/cid_sa cid_sa 1 add def}forall exit
  129. }if dup 2 eq{pop/cid_s1 cid_l9 dup 0 get/cid_s2 exch def 1 get def/cid_s3
  130. cid_la dup 0 get/cid_s4 exch def 1 get def/cid_sa 0 def cid_l3{dup 1 get type
  131. /arraytype eq{dup 0 get dup/cid_s7 exch def cid_s2 gt{pop exit}if dup 1 get
  132. dup 0 get dup/cid_s8 exch def cid_s1 le exch dup 0 get exch 1 get dup length
  133. exch 0 get length 3 idiv exch cid_s7 add cid_s4 gt 3 1 roll add 2 sub dup
  134. /cid_R_HI_L exch def cid_s3 ge and and{dup wcheck not{dup length array copy
  135. dup dup 1 get dup length array copy dup dup 4 get dup length array copy 4 exch
  136. put 1 exch put cid_l3 cid_sa 2 index put}if 1 get dup 4 get dup cid_s2 cid_s7
  137. sub 1 cid_s4 cid_s7 sub{2 copy get dup null eq{pop cid_R_HI_L cid_s8 sub 1 add
  138. dict}{dup wcheck not{dup length dict copy}if}ifelse cid_dstID type/arraytype
  139. eq{cid_dstID length cid_s3 cid_s1 sub 1 add lt{/cid_bfrange/rangecheck
  140. cid_raise}if}if dup begin cid_s1 cid_s3 cid_dstID cid_UpdateCharCodeMap end
  141. put dup}for pop pop pop/cid_m4//false def exit}{pop}ifelse}{pop}ifelse/cid_sa
  142. cid_sa 1 add def}forall exit}if(YIKES, UNSUPPORTED length =)print dup == pop
  143. exit}loop cid_m4{/cid_bfrange/rangecheck cid_raise}if}bind def
  144. /cid_UpdateCharCodeMap{cid_ComponentFonts cid_l8 get dup type/dicttype ne{
  145. findfont}if dup/FontType get 0 ne{1 index dup type/arraytype ne{dup length 1
  146. ne{/cid_UpdateCharCodemap/rangecheck cid_raise}if 0 get 256 sub neg dup 4
  147. index 6 index sub 1 add sub 0 lt{4 index add 1 sub 4 1 roll 3 2 roll pop}{pop}
  148. ifelse}{pop}ifelse/UseMatrix dup where{exch get cid_l8 2 copy known{get
  149. makefont}{pop pop}ifelse}{pop}ifelse 1 index type/arraytype eq{3 index 1 4
  150. index{[2 index 4 index 3 index 8 index sub get dup type/nametype ne{
  151. /cid_bfrange/typecheck cid_raise}if]def}for}{[1 index 5 index 4 index 0 get]4
  152. index 1 5 index{1 index def}for pop}ifelse pop pop pop pop}{1 index type
  153. /arraytype eq{/cid_bfrange/typecheck cid_raise}if dup/FMapType get 2 eq{1
  154. index dup length 2 ne{/cid_bfrange/typecheck cid_raise}if 0 get 1 index
  155. /Encoding get exch get 1 index/FDepVector get exch get exch pop exch 1 get dup
  156. 256 sub neg dup 4 index 6 index sub 1 add sub 0 lt{4 index add 1 sub 4 1 roll
  157. 3 2 roll pop}{pop}ifelse exch}{1 index dup dup length 1 ne exch length 2 ne
  158. and{/cid_bfrange/rangecheck cid_raise}if 0 get -1 0 0 4 index/SubsVector get{2
  159. index add exch pop dup 4 index gt{exit}if exch pop dup 3 2 roll 1 add 3 1 roll
  160. }forall dup 4 index sub 0 le{pop 256}if 3 2 roll 4 index/Encoding get exch get
  161. 4 index/FDepVector get exch get dup/FontType get 0 ne{5 index length 1 ne{
  162. /cid_bfrange/rangecheck cid_raise}if 6 4 roll pop pop exch 2 index sub exch 4
  163. 2 roll sub 3 1 roll 2 index 2 index sub neg dup 5 index 7 index sub 1 add sub
  164. 0 lt{5 index add 1 sub 5 1 roll exch pop 3 2 roll pop}{pop exch pop}ifelse}{5
  165. index length 2 ne{/cid_bfrange/rangecheck cid_raise}if exch pop/FDepVector get
  166. 3 1 roll sub 1 add get exch pop exch 1 get dup 256 sub neg dup 4 index 6 index
  167. sub 1 add sub 0 lt{4 index add 1 sub 4 3 roll pop 3 1 roll}{pop}ifelse exch}
  168. ifelse}ifelse/UseMatrix dup where{exch get cid_l8 2 copy known{get makefont}{
  169. pop pop}ifelse}{pop}ifelse[1 index 5 index 4 index]4 index 1 5 index{1 index
  170. def}for pop pop pop pop pop}ifelse}bind def/begincmap{currentdict wcheck not
  171. currentdict length 0 ne or{/begincmap/invalidaccess cid_raise}if lib_level2{
  172. currentdict dup gcheck{pop}{end maxlength dict begin}ifelse}if/cid_l1 35 dict
  173. def cid_l1 begin/cid_sstr1 80 string def/cid_sstr2(c00)def/cid_sarr1[null]def
  174. /cid_l3 null def/cid_l4 null def/cid_l5 -1 def/cid_l6 0 def/cid_l7 -1 def
  175. /cid_l8 0 def/cid_IsBeginCMapCalled true def end}bind def/begincodespacerange{
  176. cid_l1 begin{cid_l3 null ne{/begincodespacerange/rangecheck cid_raise}if 2
  177. cid_beginrange cid_N array/cid_l3 exch def}cid_stopped{end/begincodespacerange
  178. cid_reraise}if end}bind def/endcodespacerange{currentdict/UIDOffset known
  179. cid_l1 begin{{UIDOffset}{null}ifelse/cid_lc exch def{cid_Codespace}2
  180. cid_endrange}cid_stopped{end/endcodespace cid_reraise}if end}bind def
  181. /beginnotdefchar{cid_l1 begin{2 cid_beginrange}cid_stopped{end/beginnotdefchar
  182. cid_reraise}if end}bind def/endnotdefchar{cid_l1 begin{{exch dup 3 -1 roll
  183. cid_notdef}2 cid_endrange}cid_stopped{end/endnotdefchar cid_reraise}if end}
  184. bind def/beginnotdefrange{cid_l1 begin{3 cid_beginrange/cid_l4 cid_N cid_l4
  185. cid_resizeArray def}cid_stopped{end/beginnotdefrange cid_reraise}if end}bind
  186. def/endnotdefrange{cid_l1 begin{{cid_notdef}3 cid_endrange}cid_stopped{end
  187. /endnotdefrange cid_reraise}if end}bind def/begincidchar{cid_l1 begin{2
  188. cid_beginrange}cid_stopped{end/begincidchar cid_reraise}if end}bind def
  189. /endcidchar{cid_l1 begin{{exch dup 3 -1 roll cid_range}2 cid_endrange}
  190. cid_stopped{end/endcidchar cid_reraise}if end}bind def/begincidrange{cid_l1
  191. begin{3 cid_beginrange}cid_stopped{end/begincidrange cid_reraise}if end}bind
  192. def/endcidrange{cid_l1 begin{{cid_range}3 cid_endrange}cid_stopped{end
  193. /endcidrange cid_reraise}if end}bind def/beginbfrange{cid_l1 begin{3
  194. cid_beginrange}cid_stopped{end/beginbfrange cid_reraise}if end}bind def
  195. /endbfrange{cid_l1 begin{{cid_bfrange}3 cid_endrange}cid_stopped{end
  196. /endbfrange cid_reraise}if end}bind def/beginbfchar{cid_l1 begin{2
  197. cid_beginrange}cid_stopped{end/beginbfchar cid_reraise}if end}bind def
  198. /endbfchar{cid_l1 begin{{dup type/nametype eq{cid_sarr1 dup 0 4 3 roll put}if
  199. exch dup 3 -1 roll cid_bfrange}2 cid_endrange}cid_stopped{end/endbfchar
  200. cid_reraise}if end}bind def/beginusematrix{CIDSystemInfo dup type/dicttype eq{
  201. pop 1}{length}ifelse cid_l1 begin{1 index dup type/integertype ne{pop pop
  202. /beginusematrix/typecheck cid_raise}if currentdict/cid_IsBeginCMapCalled known
  203. not{/beginusematrix/syntaxerror cid_raise}if le 1 index 1 lt or{
  204. /beginusematrix/rangecheck cid_raise}if/cid_USE_MATRIX_FONTID exch def}
  205. cid_stopped{end/beginusematrix cid_reraise}if end}bind def/endusematrix{cid_l1
  206. begin{count 1 lt{/endusematrix/stackunderflow cid_raise}if dup type/arraytype
  207. ne{/endusematrix/typecheck cid_raise}if cid_USE_MATRIX_FONTID lib_level2{
  208. currentdict/cid_USE_MATRIX_FONTID undef}{/cid_USE_MATRIX_FONTID null def}
  209. ifelse}cid_stopped{end/endusematrix cid_reraise}if end currentdict/UseMatrix
  210. known not{/UseMatrix 1 dict def}{lib_level2 not{UseMatrix dup 2 index known{
  211. pop}{dup dup maxlength exch length eq{dup length dup add dict copy/UseMatrix
  212. exch def}{pop}ifelse}ifelse}if}ifelse exch UseMatrix 3 1 roll put}bind def
  213. /endcmap{cid_l1 begin{cid_lb 0 eq{cid_l7 255 lt{/cid_l6 cid_l6 1 add def}if}if
  214. cid_l3 dup 0 1 2 index length 1 sub{2 copy get dup wcheck{dup dup 1 get dup
  215. type/stringtype eq{2 copy 1 exch readonly put length 3 idiv 2 sub cid_l5 2 eq{
  216. 1 index 0 get}{0}ifelse exch 1 index add cid_makeCharStringsDict 2 exch put
  217. readonly put dup}{dup dup 1 get dup 0 1 2 index length 1 sub{2 copy get dup
  218. wcheck{readonly put dup}{pop pop}ifelse}for pop 1 exch readonly put readonly 1
  219. exch put readonly put dup}ifelse}{pop pop}ifelse}for pop readonly cid_l4
  220. cid_l5 cid_l6 cid_l7 3 cid_lb currentdict/cid_ComponentFonts known currentdict
  221. /cid_IsTemplateFontCIDKeyed known not and currentdict/cid_RF_Template_Font 2
  222. copy known{get}{pop pop null}ifelse currentdict/cid_RF_TemplateFontArray 2
  223. copy known{get}{pop pop null}ifelse}cid_stopped{end/endcmap cid_reraise}if end
  224. currentdict lib_level2{/cid_l1 undef}{/cid_l1 null put}ifelse/cid_cmapData 11
  225. dict def cid_cmapData begin/cid_rfTemplateFontArray exch def
  226. /cid_rfTemplateFont exch def/cid_rfTemplateFontNotCID exch def
  227. /cid_usecmapDepth exch def/cid_glyphSelectorBytes exch def/cid_highOrderByte
  228. exch def/cid_encodingIntervals exch def/cid_codespaceBytes exch def
  229. /cid_notdefs exch def/cid_codespace exch def end}bind def/usefont{
  230. CIDSystemInfo dup type/dicttype eq{pop 1}{length}ifelse cid_l1 begin{1 index
  231. dup type/integertype ne{pop pop/usefont/typecheck cid_raise}if currentdict
  232. /cid_IsBeginCMapCalled known not{/usefont/syntaxerror cid_raise}if le 1 index
  233. 1 lt or{/usefont/rangecheck cid_raise}if/cid_l8 exch def}cid_stopped{end
  234. /usefont cid_reraise}if end}bind def/cid_usefixcmap{cid_l1 begin{dup type
  235. /nametype ne{/usecmap/typecheck cid_raise}if lib_extensions
  236. /lib_FixCMapCategoryType get lib_extensions/lib_findresource get exec
  237. cid_savecmapdata}cid_stopped{end/usecmap cid_reraise}if end currentdict cid_l1
  238. begin/cid_lc exch def end}bind def/usecmap{cid_l1 begin{dup type/nametype ne{
  239. /usecmap/typecheck cid_raise}if lib_extensions/lib_CMapType get lib_extensions
  240. /lib_findresource get exec cid_savecmapdata}cid_stopped{end/usecmap
  241. cid_reraise}if end currentdict cid_l1 begin/cid_lc exch def end}bind def
  242. /cid_savecmapdata{/cid_cmapData get begin cid_usecmapDepth
  243. cid_glyphSelectorBytes cid_highOrderByte cid_encodingIntervals
  244. cid_codespaceBytes cid_notdefs cid_codespace end dup length array copy/cid_l3
  245. exch def/cid_l4 exch def/cid_l5 exch def/cid_l6 exch def/cid_l7 exch def/3
  246. exch def/cid_lb exch 1 add def}bind def/cid_GetInterval{2 index type
  247. /stringtype eq{getinterval}{exch 2 copy add 1 sub 3 index 0 get length dup 5
  248. index length 1 sub exch 1 index mul exch 6 index exch get length add 2 index
  249. le 3 index 0 lt or{/StartData/rangecheck cid_raise}if 2 index 1 index mod 2
  250. index 2 index mod 3 index 3 index idiv 5 index 4 index idiv 2 copy eq{pop 7
  251. index exch get exch pop exch 5 index getinterval 5{exch pop}repeat}{
  252. lib_extensions begin dup 9 index exch get 4 index 6 index 1 index sub
  253. getinterval/lib_dstr1 exch lib_Strcpy 1 index 1 add 1 4 index 1 sub{10 index
  254. exch get lib_Strcat}for 9 index 3 index get 0 5 index 1 add getinterval
  255. lib_Strcat lib_Strget mark 11 2 roll cleartomark end}ifelse}ifelse}bind def 1
  256. dict begin/defineresource{//defineresource}bind def/StartData{cid_extensions
  257. /cid_streamedCIDFont get{mark{currentdict/Setup known{currentdict Setup}if
  258. currentdict 97 dict begin/cid_la exch def/cid_sstr1 1024 string def/cid_sstr2
  259. 1024 string def 3 copy pop dup/cid_lb exch def 0 gt{{dup(Binary)eq{pop null
  260. currentfile lib_level2{cid_lb()/SubFileDecode filter}if/readstring load exit}
  261. if dup(Hex)eq{pop currentfile lib_level2{null exch/ASCIIHexDecode filter
  262. /readstring}{(>)exch/readhexstring}ifelse load exit}if/StartData/typecheck
  263. cid_raise}loop cid_lb 16000 le{2 copy cid_lb string exch exec pop}{cid_lb
  264. 16000 div ceiling cvi dup array exch 1 sub 0 exch 1 exch{2 copy 5 index 16000
  265. string 6 index exec pop put pop}for}ifelse/SubrArray exch def 2 index null eq{
  266. pop pop pop}{pop/readstring load 1 string exch{3 copy exec pop dup length 0 eq
  267. {pop pop pop pop pop true exit}if 4 index eq{pop pop pop pop false exit}if}
  268. loop pop}ifelse FDArray{/Private get dup/RunInt known{dup/RunInt get/eCCRun eq
  269. {cid_la/Setup known{cid_la/Setup get/CIDInit/ProcSet findresource/cid_Setup
  270. get ne}{true}ifelse{currentfile closefile/StartData/invalidfont cid_raise}if}
  271. if}if dup/SubrMapOffset known{begin/Subrs SubrCount array def Subrs
  272. SubrMapOffset SubrCount SDBytes lib_level2{currentdict dup/SubrMapOffset undef
  273. dup/SubrCount undef/SDBytes undef}if end/cid_l2 exch def/cid_l3 exch def
  274. /cid_l4 exch def/cid_l5 exch def cid_l3 0 gt{SubrArray cid_l4 cid_l2
  275. cid_GetInterval 0 cid_l2 cid_cvnsi 0 1 cid_l3 1 sub{exch 1 index 1 add cid_l2
  276. mul cid_l4 add SubrArray exch cid_l2 cid_GetInterval 0 cid_l2 cid_cvnsi cid_l5
  277. 4 2 roll SubrArray exch 4 index 1 index sub cid_GetInterval dup length string
  278. copy put}for pop}if}{pop}ifelse}forall}if cleartomark pop pop end CIDFontName
  279. currentdict/CIDFont defineresource end end}stopped{cleartomark/StartData
  280. cid_reraise}if}{pop pop/cid_startDataOffset currentfile fileposition def
  281. /cid_CIDFontWIP 99 dict def currentdict dup/Setup known{dup dup/Setup get exec
  282. }if cid_CIDFontWIP begin/cid_la exch def/cid_sstr1 1024 string def/cid_sstr2
  283. 1024 string def/cid_l1 CIDFontName/CIDFont cid_getresfilename(r)file def
  284. FDArray{/Private get dup/RunInt known{dup/RunInt get/eCCRun eq{cid_la/Setup
  285. known{cid_la/Setup get/CIDInit/ProcSet findresource/cid_Setup get ne}{true}
  286. ifelse{currentfile closefile/StartData/invalidfont cid_raise}if}if}if dup
  287. /SubrMapOffset known{begin/Subrs SubrCount array def Subrs SubrMapOffset
  288. SubrCount SDBytes end/cid_l2 exch def/cid_l3 exch def/cid_l4 exch def/cid_l5
  289. exch def cid_l1 cid_l4 cid_startDataOffset add setfileposition/cid_sstr1
  290. cid_l3 cid_l2 mul cid_redefString cid_l1 cid_sstr1 0 cid_l3 1 add cid_l2 mul
  291. getinterval readstring not{}if/cid_l6 exch def cid_l6 cid_l3 cid_l2 mul cid_l2
  292. cid_cvnsi cid_l6 0 cid_l2 cid_cvnsi dup/cid_l7 exch def sub dup/cid_sstr2 exch
  293. cid_redefString cid_l1 cid_l7 cid_startDataOffset add setfileposition cid_l1
  294. cid_sstr2 0 4 -1 roll getinterval readstring not{}if/cid_l8 exch def/cid_l9 0
  295. def 0 cid_l7 cid_l2 dup dup cid_l3 mul{cid_l6 exch cid_l2 cid_cvnsi dup 3 -1
  296. roll sub 3 -1 roll 2 copy exch cid_l8 3 1 roll getinterval cid_l5 cid_l9 3 -1
  297. roll dup length string copy put add exch/cid_l9 cid_l9 1 add def}for pop pop}{
  298. pop}ifelse}forall cid_l1 closefile end CIDFontName currentdict dup lib_level2{
  299. /cid_CIDFontWIP undef}{/cid_CIDFontWIP null put}ifelse/CIDFont defineresource
  300. end end currentfile closefile}ifelse}bind end def/cid_composefont{/CIDInit
  301. /ProcSet findresource begin cid_ComposeFont end}bind def currentdict 1 dict
  302. begin/text 128 string def begin/cid_WriteResource{mark 4 1 roll{dup/Category
  303. findresource begin 1 index//text ResourceFileName end(w)file dup
  304. (%!PS-Adobe-3.0 Resource-)writestring dup 2 index writestring dup
  305. (
  306. %%BeginResource: )writestring dup 2 index writestring dup( \()writestring dup
  307. 3 index writestring dup(\)
  308.  
  309. /)writestring dup 3 index writestring dup( )writestring dup 4 index maxlength
  310. //text cvs writestring dup( dict dup
  311. \tbegin
  312. )writestring 3 index{2 index(\t/)writestring exch//text cvs 2 index exch
  313. writestring 1 index( )writestring dup type dup/arraytype eq exch
  314. /packedarraytype eq or{1 index(
  315. \t\t[
  316. )writestring{1 index(\t\t/)writestring//text cvs 1 index exch writestring dup
  317. (
  318. )writestring}forall dup(\t\t])writestring}{//text cvs 1 index exch writestring
  319. }ifelse dup( def
  320. )writestring}forall dup(\tend
  321. )writestring dup(/)writestring dup 2 index writestring dup
  322. ( defineresource pop
  323.  
  324. %%EndResource
  325. %%EOF
  326. )writestring closefile}stopped{cleartomark false}{cleartomark true}ifelse}bind
  327. def/cid_TurnOnFontPreloading{/FontHits/FixCIDInitProcSet findresource dup
  328. maxlength dict copy dup/DynamicPreloadingEnabled true put(FontHits)
  329. (FixCIDInitProcSet)//cid_WriteResource exec not{mark{/FixCIDInitProcSet
  330. /Category findresource begin/FontHits//text ResourceFileName end deletefile}
  331. stopped cleartomark}if}bind def/cid_TurnOffFontPreloading{/FontHits
  332. /FixCIDInitProcSet findresource dup maxlength dict copy dup
  333. /DynamicPreloadingEnabled false put(FontHits)(FixCIDInitProcSet)
  334. //cid_WriteResource exec not{mark{/FixCIDInitProcSet/Category findresource
  335. begin/FontHits//text ResourceFileName end deletefile}stopped cleartomark}if}
  336. bind def/orig_cid_SetFontHits{cid_extensions/cid_fontHits 2 copy known{get mark 3 1
  337. roll{dup/? known not{(CID/FontHits)PrependRoot dup status{pop pop pop pop run
  338. pop cid_extensions/cid_fontHits get}{pop}ifelse dup/? true put}if exch 1 index
  339. exch 2 copy known{2 copy get 1 add}{1}ifelse put(CID/FontHits)PrependRoot dup
  340. status{pop pop pop pop dup{deletefile}stopped{pop}if}if(w)file dup
  341. (%!
  342. currentglobal true setglobal cid_extensions/cid_fontHits )writestring dup 2
  343. index maxlength//text cvs writestring dup( dict dup begin
  344. )writestring exch{1 index/? eq{pop pop}{2 index(/)writestring exch//text cvs 2
  345. index exch writestring 1 index( )writestring//text cvs 1 index exch
  346. writestring dup( def
  347. )writestring}ifelse}forall dup(end put setglobal
  348. )writestring closefile}stopped{cid_extensions/cid_fontHits undef}if
  349. cleartomark}{pop pop pop}ifelse}bind def
  350. % disable FontHits
  351.   /cid_SetFontHits{ pop } bind def
  352. end end/cid_ComposeFont{
  353. cid_extensions/cid_streamedCIDFont false put 16 dict begin/cid_ffWIP 25 dict
  354. def currentdict cid_ffWIP begin/cid_l3 exch def 3 dict begin 2 copy/FontArray
  355. exch def/CMap exch def/CompatibleVM lib_extensions/lib_buildCompatibleVM get
  356. def currentdict end/BuildInfo exch def/cid_sstr1 80 string def/cid_sstrdf
  357. (DF000)readonly def/cid_l1 systemdict/findfont get def/cid_ld/StandardCDevProc
  358. findcdevproc def/cid_le/NominalJISEncoding findencoding def{3 copy
  359. cid_BuildComposedFont}cid_stopped{cid_extensions/cid_streamedCIDFont true put
  360. end end/cid_ComposeFont cid_reraise}if 4 1 roll pop pop pop dup length 1 add
  361. dict begin{1 index dup/FID ne exch/cid_ffWIP ne and{def}{pop pop}ifelse}forall
  362. FontName currentdict end dup/BuildInfo BuildInfo put definefont end end
  363. cid_extensions/cid_streamedCIDFont true put}bind def/cid_BuildComposedFont{dup
  364. type/arraytype ne{/cid_BuildComposedFont/typecheck cid_raise}if lib_extensions
  365. begin lib_nativeMode lib_buildCompatibleVM and{pureNativeMode not{1183615869
  366. internaldict/CIDRun known{lib_ToggleNativeMode/lib_CIDFontType/CIDFont def}if}
  367. if}if end dup length array/cid_s5 exch def 0 exch{{dup type dup/stringtype eq
  368. exch/nametype eq or{dup/CIDFont resourcestatus{pop pop lib_extensions
  369. /lib_CIDFontType get}{/Font}ifelse lib_extensions/lib_findresource get exec
  370. exit}if dup type/dicttype eq{exit}if/cid_BuildComposedFont/typecheck cid_raise
  371. }loop cid_s5 2 index 3 -1 roll put 1 add}forall pop lib_extensions begin
  372. lib_nativeMode lib_buildCompatibleVM and{pureNativeMode{1183615869
  373. internaldict/CIDRun known{lib_ToggleNativeMode/lib_CIDFontType/CIDFontC def}if
  374. }if}if end{dup type dup/stringtype eq exch/nametype eq or{lib_extensions
  375. /lib_CMapType get lib_extensions/lib_findresource get exec exit}if dup type
  376. /dicttype eq{exit}if/cid_BuildComposedFont/typecheck cid_raise}loop/cid_s6
  377. exch def{dup type/nametype eq{cid_sstr1 cvs exit}if dup type/stringtype eq{
  378. exit}if/cid_BuildComposedFont/typecheck cid_raise}loop dup length string copy
  379. cid_s6 cid_s5 cid_BuildCompositeFont}bind def lib_extensions/lib_nativeMode
  380. get not{/beginrearrangedfont_atc{currentdict/CIDInit/ProcSet findresource eq{
  381. end}if/AdobeTypeComposer/ProcSet findresource begin beginrearrangedfont}bind
  382. def}if/cid_FindFixEntry{/FixCIDInitProcSet 2 copy resourcestatus{pop pop
  383. findresource exch 2 copy known{get true}{pop pop false}ifelse}{pop pop pop
  384. false}ifelse}bind def/cid_BuildCharCompat{lib_extensions begin true
  385. lib_vmSaveState end cid_extensions begin{/cid_dfCharCode exch def/cid_dfDict
  386. exch def cid_dfDict begin CharOffsets cid_dfCharCode cid_charOffsetsBias sub 3
  387. mul dup dup 0 lt exch cid_charOffsetsLength end ge or{pop 0}if 3 getinterval
  388. dup 0 get/cid_useFontIndex exch def dup 1 get 8 bitshift exch 2 get add
  389. /cid_cid exch def{/cid_CIDFont cid_dfDict/FDArray get cid_useFontIndex get def
  390. cid_CIDFont begin CIDFontName/CIDFont cid_getresfilename cid_cidFontCache
  391. false cid_cidFontCacheLast 0 1 cid_cidFontCacheLast{dup 4 index exch get begin
  392. cid_filename 0 cid_filenameLength getinterval 5 index eq{end exch pop exch not
  393. exch exit}if cid_fileDescriptor null eq{end exch pop exit}if pop end}for exch{
  394. 3 -1 roll pop}{2 copy get begin cid_fileDescriptor type/filetype eq{
  395. cid_fileDescriptor closefile}if/cid_fileDescriptor 4 -1 roll dup length
  396. /cid_filenameLength exch def cid_filename copy(r)file def/cid_FDBytes FDBytes
  397. def/cid_GDBytes GDBytes def/cid_startDataOffset cid_CIDFont
  398. /cid_startDataOffset get def/cid_CIDMapOffset CIDMapOffset cid_startDataOffset
  399. add def/cid_CIDCount CIDCount def/cid_CIDFontName CIDFontName def
  400. /cid_intervalLength cid_FDBytes cid_GDBytes add def/cid_twoIntervalLength
  401. cid_intervalLength dup add def cid_mapSize dup cid_CIDCount 1 add add exch
  402. idiv cid_map length 2 copy gt{sub[exch cid_intervalLength cid_mapSize mul exch
  403. {dup string exch}repeat pop cid_map{}forall]/cid_map exch def}{pop pop}ifelse
  404. cid_fileDescriptor cid_CIDMapOffset setfileposition 0 cid_CIDCount 1 add
  405. cid_mapSize neg 0{dup cid_mapSize lt{cid_map 2 index get exch
  406. cid_intervalLength mul 0 exch getinterval}{pop dup cid_map exch get}ifelse
  407. cid_fileDescriptor exch readstring{pop}{/BadCIDMapData errordict/invalidfont
  408. get exec stop}ifelse 1 add}for pop end}ifelse end dup 0 eq{pop pop
  409. cid_cidFontCache}{/cid_l9 exch def{}forall cid_cidFontCacheLast 1 add cid_l9
  410. sub -1 roll cid_cidFontCacheLast 1 add 1 roll cid_cidFontCache astore}ifelse 0
  411. get begin cid_cid cid_CIDCount ge{cid_extensions begin/cid_cid 0 def end}if
  412. /cid_charData cid_map cid_cid cid_mapSize 2 copy mod 4 1 roll idiv get exch
  413. cid_intervalLength mul cid_intervalLength getinterval def
  414. /cid_thisCharStringOffset cid_charData cid_FDBytes cid_GDBytes 1 index add 1
  415. sub 1 exch 0 4 1 roll{2 index exch get exch 8 bitshift add}for exch pop def
  416. /cid_nextCharStringOffset cid_map cid_cid 1 add cid_mapSize 2 copy mod 4 1
  417. roll idiv get exch cid_intervalLength mul cid_FDBytes add cid_GDBytes 1 index
  418. add 1 sub 1 exch 0 4 1 roll{2 index exch get exch 8 bitshift add}for exch pop
  419. def cid_nextCharStringOffset cid_thisCharStringOffset sub dup
  420. /cid_charStringLength exch def 0 eq{end/cid_cid 0 def}{exit}ifelse}loop{
  421. cid_FDBytes 1 eq{/cid_HintDictIndex cid_charData 0 get def exit}if cid_FDBytes
  422. 0 eq{/cid_HintDictIndex 0 def exit}if/cid_HintDictIndex cid_charData 0
  423. cid_FDBytes 1 index add 1 sub 1 exch 0 4 1 roll{2 index exch get exch 8
  424. bitshift add}for exch pop def exit}loop lib_level2 not{cid_dfDict/Private
  425. cid_CIDFont/FDArray get cid_HintDictIndex get/Private get{put}1183615869
  426. internaldict/superexec get exec}if cid_fileDescriptor cid_startDataOffset
  427. cid_thisCharStringOffset add setfileposition cid_dfDict cid_dfCharCode
  428. cid_fileDescriptor cid_charDataString 0 cid_charStringLength getinterval
  429. readstring pop cvx lib_level2{cid_CIDFont/FDArray get cid_HintDictIndex get
  430. /Private get}if 1183615869 internaldict lib_level2{1 index}{3 index/Private
  431. get}ifelse dup/RunInt known{/RunInt get}{pop/CCRun}ifelse get exec}stopped{
  432. stop}if end end lib_extensions begin lib_vmRestoreState end}bind executeonly
  433. def 1 dict begin/CIDRunProc 1183615869 internaldict/CIDRun known{1183615869
  434. internaldict/CIDRun get}{null}ifelse def/cid_BuildCharCIDRun{exch begin
  435. cid_charOffsetsBias sub 3 mul dup dup 0 lt exch cid_charOffsetsLength ge or{
  436. pop 0}if currentglobal exch true setglobal CharOffsets exch 3 getinterval dup
  437. 0 get FDArray exch get exch dup 1 get 8 bitshift exch 2 get add end
  438. //CIDRunProc setglobal}bind executeonly end def/cid_BuildCharStreamed{
  439. lib_extensions begin true lib_vmSaveState end 1 index begin dup
  440. cid_charOffsetsBias sub 3 mul dup dup 0 lt exch cid_charOffsetsLength ge or{
  441. pop 0}if CharOffsets exch 3 getinterval dup 0 get FDArray exch get exch dup 1
  442. get 8 bitshift exch 2 get add 1 index/GlyphDirectory get exch 1 index type
  443. /dicttype eq{2 copy known not}{dup 2 index length ge dup not{pop 2 copy get
  444. null eq}if}ifelse{pop 0}if get cvx exch/FDArray 1 index exch get exch/FDBytes
  445. get dup 0 eq{get}{pop 1 index 0 get get exch 1 1 index length 1 sub
  446. getinterval exch}ifelse/Private get end lib_level2 not{{3 index exch/Private
  447. exch put}1183615869 internaldict/superexec get exec}if 1183615869 internaldict
  448. lib_level2{1 index}{3 index/Private get}ifelse dup/RunInt known{/RunInt get}{
  449. pop/CCRun}ifelse get exec lib_extensions begin lib_vmRestoreState end}bind
  450. executeonly def/cid_BuildCharRF{2 copy exch/CharCodeMap get dup null ne{exch 3
  451. index/CharBias get add 2 copy known}{false}ifelse{get{}forall dup type
  452. /nametype ne{3 index 2 index sub add 4 index/CharBias get add cid_extensions
  453. /cid_sstr1 get dup 0 4 3 roll put 0 1 getinterval exch pop}if exch 4 2 roll
  454. pop/Show get exec}{pop pop 1 index/CharBias get add dup 256 ge{pop<00>exch
  455. /Show get/NotDefFont findfont exch exec}{1 index/CharPrefix get dup length 1
  456. add cid_extensions/cid_sstr1 get exch 0 exch getinterval dup 0 4 3 roll
  457. putinterval dup dup length 1 sub 4 3 roll put exch dup/RFTemplateFont get exch
  458. /Show get exec}ifelse}ifelse}bind executeonly def/cid_ShowRF{gsave 1000
  459. scalefont 1 index type/nametype eq{dup length dict copy dup/Encoding 1 index
  460. /Encoding get dup length array copy dup 0 6 index put put/foo exch definefont
  461. exch pop<00>exch}if setfont dup stringwidth gsave 0 0 moveto 2 index true
  462. charpath flattenpath pathbbox 5 index 5 index 0 0 currentdict/CDevProc known{0
  463. CDevProc}if grestore setcachedevice2 0 0 moveto show grestore}bind executeonly
  464. def/cid_BuildCompositeFont{/cid_l4 cid_l3 def/cid_DFIndex 0 def 1 index
  465. /cid_cmapData get dup dup/cid_rfTemplateFontNotCID get
  466. /cid_RF_TEMPLATE_FONT_NOT_CID exch def/cid_rfTemplateFont get
  467. /cid_RF_TEMPLATE_FONT exch def/cid_rfTemplateFontArray get
  468. /cid_RF_TEMPLATE_FONTARRAY exch def 1 index/cid_cmapData get dup/cid_codespace
  469. get exch/cid_codespaceBytes get 2 eq dup not/cid_lb exch def{
  470. cid_BuildFontType2}{cid_BuildFontType6}ifelse}bind def/cid_BuildFontType6{end
  471. /FontType 0 def/FMapType 6 def/FontName 5 -1 roll cvn def/FontBBox[0 -140 1000
  472. 880]def/FontMatrix matrix def/PaintType 0 def/WMode 3 index dup/WMode known{
  473. /WMode get}{pop 0}ifelse def dup length/Encoding 4 index/cid_cmapData get
  474. /cid_encodingIntervals get dup string/SubsVector exch def 2 index 1 add array
  475. /FDepVector exch def dup array 0 1 4 -1 roll 1 sub{1 index exch 4 index put}
  476. for def pop cid_ffWIP begin/cid_l5 1 def/cid_l6 0 def/cid_l7 0 def/cid_l8 3
  477. index/cid_cmapData get/cid_glyphSelectorBytes get def dup{dup 0 get exch 1 get
  478. dup type/stringtype eq{length cid_l8 idiv 2 sub}{1 get length 1 sub}ifelse 1
  479. index add/cid_la exch def/cid_l9 exch def cid_l9 cid_l6 gt{SubsVector cid_l5
  480. cid_l9 cid_l6 sub put/cid_l5 cid_l5 1 add def}if Encoding cid_l5 1 sub cid_l7
  481. put SubsVector cid_l5 2 copy exch length lt{cid_la cid_l9 sub 1 add put/cid_l5
  482. cid_l5 1 add def/cid_l6 cid_la 1 add def/cid_l7 cid_l7 1 add def}{pop pop}
  483. ifelse}forall 0 exch{dup 0 get/cid_RF_PREFIX exch def dup 1 get type
  484. /stringtype eq{2 index 0 2 index false cid_BuildFontType4}{cid_NextDF 4 index
  485. 4 index[4 index]/cid_l4 16 dict def cid_BuildFontType2}ifelse FDepVector exch
  486. 3 index exch put pop 1 add}forall dup FDepVector exch get null eq{FDepVector
  487. exch/NotDefFont cid_l1 put}{pop}ifelse pop pop FontName currentdict end
  488. currentdict exch begin definefont}bind def/cid_BuildFontType2{/cid_lc exch def
  489. cid_l4 begin/FontName 4 -1 roll cvn def/FMapType 2 def/FontBBox[0 -140 1000
  490. 880]def/FontMatrix matrix def/FontType 0 def/PaintType 0 def/WMode 2 index dup
  491. /WMode known{/WMode get}{pop 0}ifelse def cid_lb{cid_lc 0 get 1 get 1 get
  492. length dup array/Encoding exch def array/FDepVector exch def 0}{/Encoding 256
  493. array 0 1 255{1 index exch 0 put}for def/FDepVector 1 cid_lc{1 get 1 get
  494. length add}forall array def FDepVector 0/NotDefFont cid_l1 put 1}ifelse
  495. cid_BuildDescendants FontName currentdict end definefont 3 1 roll pop pop}bind
  496. def/cid_BuildDescendants{cid_lc{dup 1 get exch cid_lb{pop 0}{0 get dup
  497. /cid_RF_PREFIX exch def}ifelse 0 exch 2 index 1 get length 1 index add 1 sub 1
  498. exch{3 index 2 index add dup Encoding 4 2 roll put FDepVector exch 5 index 3
  499. index 5 index true cid_BuildFontType4 put 1 add}for exch pop add}forall pop}
  500. bind def/cid_BuildFontType4{/cid_s1 exch def cid_extensions
  501. /cid_FontType4Template get dup maxlength dict copy begin 2 index 0 get
  502. /FontBBox 2 copy get def/CDevProc 2 copy known{get/CDevProc exch def}{pop pop}
  503. ifelse/FontName cid_NextDF def dup 4 get dup type/arraytype eq{2 index get}if
  504. dup null eq cid_RF_TEMPLATE_FONT_NOT_CID not and{pop/FDArray 3 index def dup 3
  505. get dup type/arraytype eq{2 index get}if dup null ne{3 index 0 get dup/UIDBase
  506. known {/UIDBase get add 
  507.   dup 16777215 le 1 index 0 ge and {/UniqueID exch def } {pop} ifelse }
  508. {pop pop}ifelse}{pop}ifelse/Private
  509. currentdict/UniqueID known{2 dict dup begin/UniqueID UniqueID def}{1 dict dup
  510. begin}ifelse/password 5839 def end def lib_extensions/lib_nativeMode get{
  511. 1183615869 internaldict/CIDRun known{/cid_BuildCharCIDRun}{
  512. /cid_BuildCharCompat}ifelse}{2 index 0 get/GlyphDirectory known{
  513. /cid_BuildCharStreamed}{/cid_BuildCharCompat}ifelse}ifelse load/BuildChar exch
  514. def cid_s1{dup 0 get 1 sub}{-1}ifelse/cid_charOffsetsBias exch def dup 2 get
  515. /CharStrings exch def 1 get dup type/stringtype eq{exch pop}{exch get}ifelse
  516. dup length/cid_charOffsetsLength exch def/CharOffsets exch def pop}{
  517. /CharCodeMap exch def/CharPrefix 1 string def cid_s1{/CharPrefix 1 string def
  518. CharPrefix 0 3 index cid_RF_PREFIX add put/CharBias 0 def}{/CharPrefix()def
  519. /CharBias cid_RF_PREFIX def}ifelse/CharStrings 1 dict dup/.notdef 0 put def
  520. /RFTemplateFont cid_RF_TEMPLATE_FONT def/Private 1 dict dup begin/password
  521. 5839 def end def pop pop pop/Show/cid_ShowRF load def/BuildChar
  522. /cid_BuildCharRF load def}ifelse currentdict end dup/FontName get exch
  523. definefont}bind def/cid_NextDF{cid_ffWIP begin cid_sstrdf dup length string
  524. copy dup cid_DFIndex cid_sstr1 cvs dup length 5 exch sub exch putinterval
  525. /cid_DFIndex cid_DFIndex 1 add def end}bind def/beginrearrangedfont{
  526. lib_extensions begin/lib_fontDepth lib_fontDepth 1 add def end count 2 lt{
  527. /beginrearrangedfont/stackunderflow cid_raise}if dup type/arraytype ne 2 index
  528. type/nulltype eq or{/beginrearrangedfont/typecheck cid_raise}if 12 dict begin
  529. begincmap/CIDSystemInfo[2 index length{null}repeat]def/CMapName/TEMP_CMAP def
  530. dup 0 get dup type/dicttype ne{findfont}if dup/WMode 2 copy known{get/WMode
  531. exch def}{pop pop}ifelse cid_l1 begin exch/cid_ComponentFonts exch def exch
  532. /cid_RF_FontName exch def dup dup/cid_RF_Template_Font exch def end/FontType 2
  533. copy known{get 0 ne{pop 1 begincodespacerange<00><ff>endcodespacerange}{{dup
  534. /BuildInfo 2 copy known not{pop pop false exit}if get dup/FontArray 2 copy
  535. known not{pop pop pop false exit}if get exch/CMap 2 copy known not{pop pop pop
  536. false exit}if get dup type/dicttype ne{/CMap findresource}if true exit}loop{
  537. cid_l1 begin dup/cid_cmapData get/cid_rfTemplateFont get null eq
  538. /cid_IsTemplateFontCIDKeyed exch def cid_savecmapdata/cid_RF_TemplateFontArray
  539. exch def pop end}{cid_l1/cid_IsTemplateFontCIDKeyed false put dup/FMapType get
  540. {dup 2 eq{pop dup/FDepVector get 0 get/FontName get/NotDefFont ne{pop 1
  541. begincodespacerange<0000><ffff>endcodespacerange}{10 array exch dup/Encoding
  542. get 0{2 copy get 0 ne{dup dup 4 index/FDepVector get exch get dup/Encoding get
  543. dup 0 exch{/.notdef ne{dup dup dup 1 255{4 index exch get/.notdef eq{exit}if 1
  544. add}for 1 sub 3 -1 roll exit}if 1 add}forall pop 5 index 1 add dup 1 255{8
  545. index exch get 0 eq{exit}if 1 add}for 1 sub dup[2 string dup dup 0 11 index
  546. put 1 7 index put 2 string dup dup 0 7 index put 1 7 index put]11 index dup 0
  547. exch{null eq{exit}{1 add}ifelse}forall 3 2 roll put 8 1 roll 7{pop}repeat}if 1
  548. add dup 255 gt{exit}if}loop pop pop pop dup 0 exch{null eq{exit}{1 add}ifelse}
  549. forall begincodespacerange exch{dup type/arraytype eq{{}forall}{pop exit}
  550. ifelse}forall endcodespacerange}ifelse exit}if dup 6 eq{pop 0 1 index
  551. /SubsVector get dup length array 0 2 index{4 index add 5 1 roll 4 -1 roll pop
  552. 4 index/FDepVector get 1 index get dup/FontType get 0 ne{pop 3 index dup 4
  553. index 3 index 1 add dup 2 index length eq{pop pop pop 255}{get 1 sub add}
  554. ifelse 3 index 3 index[1 string dup 0 7 index put 1 string dup 0 7 index put]
  555. put pop pop}{4 index dup 5 index 4 index 1 add dup 2 index length eq{pop pop
  556. pop 16# FF}{get 1 sub add}ifelse 2 index/FDepVector get 1 get/Encoding get dup
  557. 0 exch{/.notdef ne{dup 255 255 -1 4 index 1 sub{4 index exch get/.notdef ne{
  558. exit}if 1 sub}for 8 index 8 index[2 string dup dup 0 12 index put 1 7 index
  559. put 2 string dup dup 0 12 index put 1 7 index put]put pop pop exit}if 1 add}
  560. forall dup 256 eq{6 index 6 index[2 string dup dup 0 10 index put 1 0 put 2
  561. string dup dup 0 10 index put 1 255 put]put}if 5{pop}repeat}ifelse 1 add}
  562. forall 5 2 roll pop pop pop begincodespacerange exch{{}forall}forall
  563. endcodespacerange exit}if(YIKES, UNSUPPORTED FMapType =)print dup == pop exit}
  564. loop}ifelse}ifelse}{pop pop pop/beginrearrangedfont/typecheck cid_raise}ifelse
  565. }bind def/endrearrangedfont{cid_l1 begin cid_RF_FontName
  566. cid_IsTemplateFontCIDKeyed{cid_RF_TemplateFontArray}{cid_ComponentFonts}ifelse
  567. end endcmap CMapName currentdict/CMap defineresource end exch composefont pop
  568. lib_extensions begin lib_fontDepth 0 gt{/lib_fontDepth lib_fontDepth 1 sub def
  569. lib_nativeMode lib_fontDepth 0 eq and{lib_ToggleNativeMode
  570. /lib_buildCompatibleVM false def/lib_CMapType/CMap def/lib_FixCMapCategoryType
  571. /FixCMapCategory def/lib_CIDFontType/CIDFont def}if}if end}bind def 20 dict
  572. begin/scratchLength 128 def/scratch scratchLength string def/a currentdict def
  573. /b{dup length 1 sub 8 idiv string 1 index 0 get 7 and 0 1 1 5 index length 1
  574. sub{4 index 1 index get 3 index 8 mod neg bitshift 1 and 2 index 1 bitshift
  575. add 3 1 roll dup 8 mod 0 eq{8 idiv 1 sub 4 index exch 3 index put exch pop 0
  576. exch pop}{pop pop}ifelse exch 5 index mul 4 index mod exch}for pop pop exch 0
  577. get -3 bitshift{dup 1 eq{pop 0 0 1 3{2 index exch get exch 8 bitshift add}for
  578. exch exit}if exit}loop pop exch pop exch pop}bind def/c{dup 65535 and//a exch
  579. /e exch put -16 bitshift//a exch/d exch put}bind executeonly def/invalidfont{
  580. /Setup errordict/invalidfont get exec stop}bind executeonly def/_definefont{
  581. dup type/arraytype ne{stop}if dup length 2 lt{stop}if//a begin 263407485 c d e
  582. 2 index 0 get b CIDFontName ne{stop}if d e 2 index 1 get b systemdict
  583. /currentsystemparams get exec/LicenseID get ne{stop}if pop end}bind
  584. executeonly def/_setfont{dup type/arraytype ne{stop}if dup length 5 lt{stop}if
  585. //a begin 221066939 c d e 2 index 0 get b CIDFontName ne{stop}if d e 2 index 1
  586. get b systemdict/serialnumber get exec ne{stop}if d e 2 index 2 get b dup 0 ne
  587. {systemdict/currentsystemparams get exec/LicenseID get ne{stop}if}{pop}ifelse
  588. d e 2 index 3 get b dup 0 ne{systemdict/product get ne{stop}if}{pop}ifelse d e
  589. 2 index 4 get b dup 0 ne{dup -16 bitshift exch 65535 and gsave initgraphics 72
  590. 72 dtransform grestore abs exch abs 2 copy gt{exch}if pop exch 1 index lt{stop
  591. }if gt{stop}if}{pop}ifelse pop end}bind executeonly def/_makefont{dup type
  592. /arraytype ne{stop}if dup length 4 lt{stop}if//a begin 780128085 c d e 2 index
  593. 0 get b CIDFontName ne{stop}if d e 2 index 1 get b systemdict
  594. /currentsystemparams get exec/LicenseID get ne{stop}if d e 2 index 2 get b
  595. systemdict/serialnumber get exec ne{stop}if d e 2 index 3 get b dup 0 ne{dup
  596. -16 bitshift exch 65535 and gsave initgraphics 72 72 dtransform grestore abs
  597. exch abs 2 copy gt{exch}if pop exch 1 index lt{stop}if gt{stop}if}{pop}ifelse
  598. pop end}bind executeonly def/_scalefont{dup type/arraytype ne{stop}if dup
  599. length 3 lt{stop}if//a begin 1926854025 c d e 2 index 0 get b CIDFontName ne{
  600. stop}if d e 2 index 1 get b systemdict/currentsystemparams get exec/LicenseID
  601. get ne{stop}if d e 2 index 2 get b dup 0 ne{dup -16 bitshift exch 65535 and
  602. gsave initgraphics 72 72 dtransform grestore abs exch abs 2 copy gt{exch}if
  603. pop exch 1 index lt{stop}if gt{stop}if}{pop}ifelse pop end}bind executeonly
  604. def currentdict/cid_Setup known not{/cid_Setup{cid_extensions/systemdict get
  605. begin count 1 ge//systemdict/globaldict known{//systemdict/globaldict get}{
  606. userdict}ifelse/$PGFKeys known and{dup type/dicttype eq{dup/CIDFontName known{
  607. dup/CIDFontName get//systemdict/globaldict known{//systemdict/globaldict get}{
  608. userdict}ifelse/$PGFKeys get exch 2 copy known{get dup type/stringtype eq{
  609. false}{pop true}ifelse}{pop pop true}ifelse}{true}ifelse}{true}ifelse}{true}
  610. ifelse{end//invalidfont exec}if{eexec}stopped{end//invalidfont exec}if count 2
  611. lt{end//invalidfont exec}if dup type/nametype ne{end//invalidfont exec}if
  612. //scratch 0(_)putinterval dup//scratch 1 127 getinterval cvs pop length 1 add
  613. //scratch exch 0 exch getinterval mark 3 1 roll{dup//a exch known{//a exch get
  614. exec}{stop}ifelse}stopped{cleartomark end//invalidfont exec}if cleartomark pop
  615. end}bind executeonly end def}{end}ifelse currentdict end/ProcSet
  616. defineresource end
  617. %%EndResource
  618. %%EOF
  619.